The following example reads the number of label levels present on the x axis using the x Axis object.
Private Sub Command1_Click()
Dim XAxis As Object
Dim NumberOfLevels As Integer
' Read the number of label level present on the X
' Axis.
Set XAxis = MSChart1.Plot.Axis(VtChAxisIdX, 1)
NumberOfLevels = XAxis.LabelLevelCount
MsgBox "Number of Label Levels = " _
& Str(NumberOfLevels)
End Sub